0 PRINT "[147]":POKE 53281,0:POKE 53280,0:POKE 646,1:POKE 53272,23:GOTO50
1 PRINT "[212]HE [201]NSIDE [195]ONNECTION #3":PRINT:PRINT "[208]RESENTED [194]Y [205]YRIAD!"
2 PRINT:PRINT "[200]IT [210]ETURN!"
3 GETZ$:IFZ$<>CHR$(13)THEN3
4 DIMB$(141):A%=1:PRINT"[155]LOADING FILENAMES...[159]":C$=CHR$(34):OPEN1,8,0,"$":FORN=1TO28:GET#1,W$:N$=N$+W$:NEXT
5 GET#1,W$,W$,W$,W$
6 IFSTTHEN14
7 GET#1,W$:IFW$<>C$THEN6
8 GET#1,X$
9 GET#1,W$:IFW$<>C$THENX$=X$+W$:GOTO9
10 B$(A%)=X$:PRINTB$(A%)
11 GET#1,W$:IFW$="S"THENA%=A%+1:PRINT"[145]_ SEQ. FILE[159]
12 [139]W$[179][177]""[167]11
13 [137]5
14 D%[178]1:M%[178]42:N%[178]1:[160]1
15 [153][199](14)"LOADCONT DISK MENU WAITSYS";N$:[153]"OPEN PRESS RETURN FOR NEXT PAGE.
16 PRINT"[155]"N%"[157][146]"B$(N%)TAB(20)"[155]"N%+1"[157][146]"B$(N%+1):N%=N%+2:IFN%<A%ANDN%<=M%THEN16
17 P$="":INPUT"[159] LOAD & PRINT SEQ. FILE NUMBER [146] ";P$:IFN%>43THENN%=1
18 P%=VAL(P$):IFP$=""ANDN%>42ANDN%<=A%THENM%=83:N%=43:D%=43:GOTO15
19 IFP%<D%ORP%>=A%ORP>=M%THEN14
20 DN=3:SA=0:C$="":PRINT"[147][158] [198]ILENAME... "B$(P%):INPUT"OUTPUT TO <S>CREEN OR <P>RINTER ? S[157][157][157]";IN$:IFLEFT$(IN$,1)<>"S"THEN22
21 C$="":IFIN$="S"GOTO23
22 DN=4:SA=7:PRINT
23 PRINT:OPEN4,DN,SA:D$=C$:T=0:OPEN1,8,5,B$(P%):PRINT"[158]PRESS ANY KEY TO PAUSE PRINTING ...
24 [161]#1,A$:OK[178](ST):[139]DE[178]3[137]27
25 [139]A$[178]"LOAD"[167]A$[178][199](17)
26 [137]30
27 [139]A$[179][177]"LOAD"[137]30
28 [153]" PRESS ANY KEY TO CONTINUE WAIT
29 GETIN$:IFIN$=""GOTO29
30 GETZ$:IFZ$=""THEN35
31 PRINT:PRINT"[159] [208]AUSE:  <[205]> = [205]ENU, <[195]> = [195]ONTINUE [146]
32 [161]Z$:[139]Z$[179][177]"M"[175]Z$[179][177]"C"[167]32
33 [139]Z$[178]"M"[167]43
34 Z$[178]"
35 PRINT#4,A$;:IFOK<>0GOTO41
36 IFDE=3GOTO24
37 IFA$<>CHR$(34)GOTO24
38 IFT=0THEND$="":T=1:GOTO24
39 IFT=1THEND$=C$:T=0:GOTO24
40 PRINT"ERROR
41 [153]"  OPEN PRESS ANY KEY WAIT
42 GETA$:IFA$=""THEN42
43 CLOSE4:CLOSE1:GOTO14
50 PRINT"[147]"
51 PRINT"[155] -[212]HE [201]NSIDE [195]ONNECTION #3- ":PRINT
52 PRINT"[152][201]MPORTED BY [205]OTLEY/[196]EATH[211]ECTOR"
53 PRINT:PRINT"[201] DIDN'T PUT A INTRO IN IT B'COZ IT'S"
54 PRINT"PROGRAMMED IN [194]ASIC... [210]EMEMBER THAT THEINFO";
55 PRINT"MATION IS IMPORTANT,NOT THE LOOKS."
56 PRINT"[193]NYWAY,IT'S A GOOD [200]/[208] MAG FOR ALL MODEM";
57 PRINT"USERS.":PRINT"                    /[205]OTLEY":PRINT:PRINT"   [208]RESS [211]PACE"
58 GETA$:IFA$=""THEN 58
59 PRINT"[147]":GOTO1